home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / editor / edt10.lha / Beispiele / ReqChoice.edt < prev    next >
Text File  |  1995-02-28  |  263b  |  9 lines
  1. /* Beispiel für ReqChoice */
  2. OPTIONS RESULTS
  3. 'ReqChoice' "Auswahl" "Aufschnitt" "Schinken|Salat|Tomaten" 1
  4. PARSE VAR RESULT aktion wahl           /* Eingabe auswerten */
  5. IF aktion="OK" THEN
  6.   echo "Sie haben den Aufschnitt" wahl "gewählt."
  7. ELSE
  8.   echo "Abbruch!"
  9.